dessin("Instructions conditionnelles","L.Robin"); curseur("Rayon", 6, 255, 3, 30) ; // Rayon : variable globale variant de 6 à 255 par pas de 3, initialement 30. // Rayon est exploitable par la fonction dessiner. effacer("le brouillon"); afficher("Aire du disque de rayon", Rayon, ":", PI*Rayon^2, "."); booléen("avec_affichage_dynamique", false) ; // Destiné à une instruction conditionnelle. cadence(40) ; // La fonction dessiner sera exécutée 40 fois/s. fond(200); // fond pour la toile : 0 pour noir à 255 pour blanc. //------------------------------------------------------------------------------------------------------------ dessiner = function() { // Exécutée 40 fois par seconde (maximum possible : 60). //------------------------------------------------------------------------------------------------------------ var x, y = Rayon, D, Aire ; // Variables locales à la fonction dessiner. D = 2*Rayon ; x = D + 10 ; Aire = PI*Rayon^2 ; // D : diamètre. if(avec_affichage_dynamique) // On conditionne le bloc d'instructions suivant. { effacer("le brouillon"); afficher("D vaut", D) ; afficher("Aire ≈", arrondi(Aire)); }; coloriage(Rayon,0,0) ; cercle(x,y,Rayon); }; // ------------------------------ FIN de la fonction de dessin dynamique. ---------------------------------